boolean
integer
integer
local
integer
boolean
loop
SubString
set
exitwhen
set
set
endloop
then
set
SubString
set
false
endif
endif
then
set
else
set
endif
return
